﻿Imports System.Data.SqlClient
Imports System.Web.Services
Imports System.Configuration
Imports System.Web.Services.Protocols
Imports BusinessRules

<WebService(Namespace:="http://tempuri.org/")> _
Public Class Service1
    Inherits System.Web.Services.WebService

#Region " Web 服务设计器生成的代码 "

    Public Sub New()
        MyBase.New()

        '该调用是 Web 服务设计器所必需的。
        InitializeComponent()

        '在 InitializeComponent() 调用之后添加您自己的初始化代码

    End Sub

    'Web 服务设计器所必需的
    Private components As System.ComponentModel.IContainer

    '注意：以下过程是 Web 服务设计器所必需的
    '可以使用 Web 服务设计器修改此过程。
    '不要使用代码编辑器修改它。
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub

    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        'CODEGEN: 此过程是 Web 服务设计器所必需的
        '不要使用代码编辑器修改它。
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        End If
        MyBase.Dispose(disposing)
    End Sub

#End Region

    '获取Webconfig配置文件中的数据库连接设置
    Private strConn As String = ConfigurationManager.AppSettings("DBConnection")

    '定义预警消息扫描全局变量
    Private Ddone(30) As Boolean
    Private Hdone(23) As Boolean


    <WebMethod()> Public Function ScanTimingTask() As String
        Dim conn As New 
    End Function
End Class